dr='n:'
f0='bjsSUPP.dbf'
f1='SUPPLIER'
sele 1
use &dr&f1
zap
appen from &dr&f0
